
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 '     R U N   T H I S   P R O G R A M 
 
 '     A N D   M O V E   T H E   M O U S E   C U R S O R   O N   T H E   P R O G R A M   L I N E S 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 
 
 V a r i a b l e   N u m e r i c   S l o t _ M o t o r 
 
 S l o t _ M o t o r   =   9 
 
 S l o t   S l o t _ M o t o r   +   1   =   4 
 
 
 
 V a r i a b l e   S t r i n g   S t r i n g 1 
 
 S t r i n g 1   =   " T h e   B e a t l e s " 
 
 
 
 S l o t   0   =   R e s e t 
 
 
 
 F o r   v 1   =   0   T o   I n f i n i t y 
 
 	 F o r   v 2   =   1 0   T o   2 0 
 
 	 	 S l o t   S l o t _ M o t o r   =   v 1   *   v 2 
 
 	 N e x t 
 
 N e x t 
 
 
 
 S t o p 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - -   t h e   f o l l o w i n g   i n s t r u c t i o n s   a r e   n o t   e x e c u t e d 
 
 '                                                   s o   s 1   a n d   t h e   S l o t _ M o t o r   a r e   n o t   u p d a t e d 
 
 s 1   =   D e c o d e C o m m a n d S l o t ( 0 ) 
 
 s 1   =   N o w 
 
 s 1   =   C o s ( R n d ( ) ) 
 
 
 
 S l o t   S l o t _ M o t o r   +   1   =   9 
 
 P r i n t   S l o t ( S l o t _ M o t o r ) 
 
 P r i n t   S l o t ( S l o t _ M o t o r   +   1 ) 
 
 S l o t     (   S l o t _ M o t o r     )     =   A b s ( S i n ( S l o t ( S l o t _ M o t o r ) ) ) 
 
 
 
 
 
 